--- /dev/null
+#include <gtk/gtk.h>
+
+static void
+stack_role (void)
+{
+ GtkWidget *stack = gtk_stack_new ();
+ GtkWidget *child1 = gtk_label_new ("a");
+ GtkWidget *child2 = gtk_label_new ("b");
+ GtkWidget *switcher = gtk_stack_switcher_new ();
+ GtkWidget *child;
+ GtkStackPage *page;
+
+ g_object_ref_sink (stack);
+ g_object_ref_sink (switcher);
+
+ gtk_stack_add_named (GTK_STACK (stack), child1, "a");
+ gtk_stack_add_named (GTK_STACK (stack), child2, "b");
+
+ gtk_stack_switcher_set_stack (GTK_STACK_SWITCHER (switcher), GTK_STACK (stack));
+
+ gtk_test_accessible_assert_role (GTK_ACCESSIBLE (stack), GTK_ACCESSIBLE_ROLE_WIDGET);
+ gtk_test_accessible_assert_role (GTK_ACCESSIBLE (switcher), GTK_ACCESSIBLE_ROLE_TAB_LIST);
+
+ child = gtk_widget_get_first_child (switcher);
+ page = gtk_stack_get_page (GTK_STACK (stack), child1);
+ gtk_test_accessible_assert_role (GTK_ACCESSIBLE (child), GTK_ACCESSIBLE_ROLE_TAB);
+ gtk_test_accessible_assert_role (GTK_ACCESSIBLE (page), GTK_ACCESSIBLE_ROLE_TAB_PANEL);
+
+ child = gtk_widget_get_last_child (switcher);
+ page = gtk_stack_get_page (GTK_STACK (stack), child2);
+ gtk_test_accessible_assert_role (GTK_ACCESSIBLE (child), GTK_ACCESSIBLE_ROLE_TAB);
+ gtk_test_accessible_assert_role (GTK_ACCESSIBLE (page), GTK_ACCESSIBLE_ROLE_TAB_PANEL);
+
+ g_object_unref (stack);
+ g_object_unref (switcher);
+}
+
+static void
+stack_state (void)
+{
+ GtkWidget *stack = gtk_stack_new ();
+ GtkWidget *child1 = gtk_label_new ("a");
+ GtkWidget *child2 = gtk_label_new ("b");
+ GtkWidget *switcher = gtk_stack_switcher_new ();
+ GtkWidget *child;
+
+ g_object_ref_sink (stack);
+ g_object_ref_sink (switcher);
+
+ gtk_stack_add_named (GTK_STACK (stack), child1, "a");
+ gtk_stack_add_named (GTK_STACK (stack), child2, "b");
+
+ gtk_stack_switcher_set_stack (GTK_STACK_SWITCHER (switcher), GTK_STACK (stack));
+
+ child = gtk_widget_get_first_child (switcher);
+ gtk_test_accessible_assert_state (GTK_ACCESSIBLE (child), GTK_ACCESSIBLE_STATE_SELECTED, TRUE);
+
+ child = gtk_widget_get_last_child (switcher);
+ gtk_test_accessible_assert_state (GTK_ACCESSIBLE (child), GTK_ACCESSIBLE_STATE_SELECTED, FALSE);
+
+ g_object_unref (stack);
+ g_object_unref (switcher);
+}
+
+static void
+stack_relations (void)
+{
+ GtkWidget *stack = gtk_stack_new ();
+ GtkWidget *child1 = gtk_label_new ("a");
+ GtkWidget *child2 = gtk_label_new ("b");
+ GtkWidget *switcher = gtk_stack_switcher_new ();
+ GtkWidget *child;
+ GtkStackPage *page;
+ GList *list;
+
+ g_object_ref_sink (stack);
+ g_object_ref_sink (switcher);
+
+ gtk_stack_add_named (GTK_STACK (stack), child1, "a");
+ gtk_stack_add_named (GTK_STACK (stack), child2, "b");
+
+ gtk_stack_switcher_set_stack (GTK_STACK_SWITCHER (switcher), GTK_STACK (stack));
+
+ child = gtk_widget_get_first_child (switcher);
+ page = gtk_stack_get_page (GTK_STACK (stack), child1);
+ list = g_list_append (NULL, page);
+ gtk_test_accessible_assert_relation (GTK_ACCESSIBLE (child), GTK_ACCESSIBLE_RELATION_CONTROLS, list);
+ g_list_free (list);
+
+ child = gtk_widget_get_last_child (switcher);
+ page = gtk_stack_get_page (GTK_STACK (stack), child2);
+ list = g_list_append (NULL, page);
+ gtk_test_accessible_assert_relation (GTK_ACCESSIBLE (child), GTK_ACCESSIBLE_RELATION_CONTROLS, list);
+ g_list_free (list);
+
+ g_object_unref (stack);
+ g_object_unref (switcher);
+}
+
+int
+main (int argc, char *argv[])
+{
+ gtk_test_init (&argc, &argv, NULL);
+
+ g_test_add_func ("/a11y/stack/role", stack_role);
+ g_test_add_func ("/a11y/stack/state", stack_state);
+ g_test_add_func ("/a11y/stack/relations", stack_relations);
+
+ return g_test_run ();
+}
+